<?php

function xml_getparse($contents, $get_attributes=1, $priority = 'tag') {
    if (!$contents)
        return array();

    if (!function_exists('xml_parser_create')) {
        //print "'xml_parser_create()' function not found!";
        return array();
    }

    //Get the XML parser of PHP - PHP must have this module for the parser to work
    $parser = xml_parser_create('');
    xml_parser_set_option($parser, XML_OPTION_TARGET_ENCODING, "UTF-8");
    xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, 0);
    xml_parser_set_option($parser, XML_OPTION_SKIP_WHITE, 1);
    xml_parse_into_struct($parser, trim($contents), $xml_values);
    xml_parser_free($parser);

    if (!$xml_values)
        return; //Hmm...
        //Initializations
 $xml_array = array();
    $parents = array();
    $opened_tags = array();
    $arr = array();

    $current = &$xml_array; //Refference
    //Go through the tags.
    $repeated_tag_index = array(); //Multiple tags with same name will be turned into an array
    foreach ($xml_values as $data) {
        unset($attributes, $value); //Remove existing values, or there will be trouble
        //This command will extract these variables into the foreach scope
        // tag(string), type(string), level(int), attributes(array). 
        extract($data); //We could use the array by itself, but this cooler.

        $result = array();
        $attributes_data = array();

        if (isset($value)) {
            if ($priority == 'tag')
                $result = $value;
            else
                $result['value'] = $value; //Put the value in a assoc array if we are in the 'Attribute' mode

        }

        //Set the attributes too.
        if (isset($attributes) and $get_attributes) {
            foreach ($attributes as $attr => $val) {
                if ($priority == 'tag')
                    $attributes_data[$attr] = $val;
                else
                    $result['attr'][$attr] = $val; //Set all the attributes in a array called 'attr'

            }
        }
        // limpar arrays vazias
        if (!isset($value) && !isset($attributes)) {
            $result = '';
        }
        //See tag status and do the needed. 
        if ($type == "open") {//The starting of the tag '<tag>'
            $parent[$level - 1] = &$current;
            if (!is_array($current) or (!in_array($tag, array_keys($current)))) { //Insert New tag
                $current[$tag] = $result;
                if ($attributes_data)
                    $current[$tag . '_attr'] = $attributes_data;
                $repeated_tag_index[$tag . '_' . $level] = 1;

                $current = &$current[$tag];
            } else { //There was another element with the same tag name
                if (isset($current[$tag][0])) {//If there is a 0th element it is already an array
                    $current[$tag][$repeated_tag_index[$tag . '_' . $level]] = $result;
                    $repeated_tag_index[$tag . '_' . $level]++;
                } else {//This section will make the value an array if multiple tags with the same name appear together
                    $current[$tag] = array($current[$tag], $result); //This will combine the existing item and the new item together to make an array
                    $repeated_tag_index[$tag . '_' . $level] = 2;

                    if (isset($current[$tag . '_attr'])) { //The attribute of the last(0th) tag must be moved as well
                        $current[$tag]['0_attr'] = $current[$tag . '_attr'];
                        unset($current[$tag . '_attr']);
                    }
                }
                $last_item_index = $repeated_tag_index[$tag . '_' . $level] - 1;
                $current = &$current[$tag][$last_item_index];
            }
        } elseif ($type == "complete") { //Tags that ends in 1 line '<tag />'
            //See if the key is already taken. 
            if (!isset($current[$tag])) { //New Key
                $current[$tag] = $result;
                $repeated_tag_index[$tag . '_' . $level] = 1;
                if ($priority == 'tag' and $attributes_data)
                    $current[$tag . '_attr'] = $attributes_data;
            } else { //If taken, put all things inside a list(array)
                if (isset($current[$tag][0]) and is_array($current[$tag])) {//If it is already an array...
                    // ...push the new element into that array.
                    $current[$tag][$repeated_tag_index[$tag . '_' . $level]] = $result;

                    if ($priority == 'tag' and $get_attributes and $attributes_data) {
                        $current[$tag][$repeated_tag_index[$tag . '_' . $level] . '_attr'] = $attributes_data;
                    }
                    $repeated_tag_index[$tag . '_' . $level]++;
                } else { //If it is not an array...
                    $current[$tag] = array($current[$tag], $result); //...Make it an array using using the existing value and the new value
                    $repeated_tag_index[$tag . '_' . $level] = 1;
                    if ($priority == 'tag' and $get_attributes) {
                        if (isset($current[$tag . '_attr'])) { //The attribute of the last(0th) tag must be moved as well
                            $current[$tag]['0_attr'] = $current[$tag . '_attr'];
                            unset($current[$tag . '_attr']);
                        }

                        if ($attributes_data) {
                            $current[$tag][$repeated_tag_index[$tag . '_' . $level] . '_attr'] = $attributes_data;
                        }
                    }
                    $repeated_tag_index[$tag . '_' . $level]++; //0 and 1 index is already taken
                }
            }
        } elseif ($type == 'close') { //End of tag '</tag>'
            $current = &$parent[$level - 1];
        }
    }

    return($xml_array);
}

function getBankList() {
    # Carrega dados de bancos activos # Desactivada validacao
    $__sysBanks = array();
    $GETSystemBanks = $GLOBALS['MYT']->db_array("SELECT bp_ID, bp_IdBanco, bp_Name, bp_Country FROM hd_bancos");
    $CSystemBanks = $GETSystemBanks[0];
    for ($i = 1; $i <= $CSystemBanks; $i++) {
        $__sysBanks['p' . $GETSystemBanks[$i]['bp_Country'] . '^*^' . $GETSystemBanks[$i]['bp_Name'] . '^*^' . $GETSystemBanks[$i]['bp_IdBanco']] = $GETSystemBanks[$i]['bp_ID'];
    }
    return $__sysBanks;
}

function getCountryList() {
    # Carrega dados de paises activos
    $__sysCountries = array();
    $GETSystemCountries = $GLOBALS['MYT']->db_array("SELECT pai_Codelite, pai_Sufijo FROM hd_paises");
    $CSystemCountries = $GETSystemCountries[0];
    for ($i = 1; $i <= $CSystemCountries; $i++) {
        $__sysCountries['p' . $GETSystemCountries[$i]['pai_Sufijo']] = $GETSystemCountries[$i]['pai_Codelite'];
    }
    return $__sysCountries;
}

function getCityList($seletedCountry) {
    # Carrega dados de cidades activos
    $__sysCities = array();
    $GETSystemCities = $GLOBALS['MYT']->db_array("SELECT CiuNumero, CiuCiudad FROM ciudades WHERE CiuPais =" . $seletedCountry);
    $CSystemCities = $GETSystemCities[0];
    for ($i = 1; $i <= $CSystemCities; $i++) {
        $__sysCities['p' . $GETSystemCities[$i]['CiuNumero']] = $GETSystemCities[$i]['CiuCiudad'];
    }
    return $__sysCities;
}

function getAgencyList() {
    # Carrega dados de agencias activos
    $__sysAgencies = array();
    $GETSystemAgencies = $GLOBALS['MYT']->db_array("SELECT OFId, OfCorrCode FROM oficcorresp WHERE OfCorrCode IS NOT NULL AND OfActiva = 1
                                                        UNION 
                                                        SELECT OriNumero AS OFId, dom_CorrCode AS OfCorrCode FROM dominios INNER JOIN origenes ON OriDominio = dom_ID WHERE dom_CorrCode IS NOT NULL AND OriTipo = 2");
    $CSystemAgencies = $GETSystemAgencies[0];
    for ($i = 1; $i <= $CSystemAgencies; $i++) {
        $__sysAgencies['p' . $GETSystemAgencies[$i]['OfCorrCode']] = $GETSystemAgencies[$i]['OFId'];
    }
    return $__sysAgencies;
}

function getDomainList() {
    # Carrega dados de balcoes activos
    $__sysDomains = array();
    $GETSystemDomains = $GLOBALS['MYT']->db_array("SELECT OriNumero AS dom_ID, dom_CorrCode FROM dominios INNER JOIN origenes ON OriDominio = dom_ID WHERE dom_CorrCode IS NOT NULL AND OriTipo = 2");
    $CSystemDomains = $GETSystemDomains[0];
    for ($i = 1; $i <= $CSystemDomains; $i++) {
        $__sysDomains['p' . $GETSystemDomains[$i]['dom_CorrCode']] = $GETSystemDomains[$i]['dom_ID'];
    }
    return $__sysDomains;
}

function getAccountList() {
    # Carrega dados de tipos de conta
    $__sysRcvAcountType = array();
    $GETSystemRcvAcountType = $GLOBALS['MYT']->db_array("SELECT REF, LEFT(SHORT_NAME,1) AS ActName FROM hf_actypes");
    $CSystemRcvAcountType = $GETSystemRcvAcountType[0];
    for ($i = 1; $i <= $CSystemRcvAcountType; $i++) {
        $__sysRcvAcountType['p' . $GETSystemRcvAcountType[$i]['ActName']] = $GETSystemRcvAcountType[$i]['REF'];
    }
    return $__sysRcvAcountType;
}

function getCurrencyList() {
    # Carrega dados de moedas activas
    $__sysCurrency = array();
    $GETSystemCurrency = $GLOBALS['MYT']->db_array("SELECT miso_Cod_elite, miso_ID FROM hd_monedasiso");
    $CSystemCurrency = $GETSystemCurrency[0];
    for ($i = 1; $i <= $CSystemCurrency; $i++) {
        $__sysCurrency['p' . $GETSystemCurrency[$i]['miso_ID']] = $GETSystemCurrency[$i]['miso_Cod_elite'];
    }
    return $__sysCurrency;
}

function getPaymentModeList() {
    # Carrega dados de metodos de pagamento
    $__sysPaymentMode = array();
    $GETSystemPaymentMode = $GLOBALS['MYT']->db_array("SELECT mp_ID, mp_Short FROM hd_modospago WHERE mp_Flag = 1");
    $CSystemPaymentMode = $GETSystemPaymentMode[0];
    for ($i = 1; $i <= $CSystemPaymentMode; $i++) {
        $__sysPaymentMode['p' . $GETSystemPaymentMode[$i]['mp_Short']] = $GETSystemPaymentMode[$i]['mp_ID'];
    }
    return $__sysPaymentMode;
}

function isocode_replace($codevalues, $input, $return_errorvalue) {
    $val_input = explode('^*^', $input);
    $input = trim($input);
    if (isset($codevalues[$input])) {
        return $codevalues[$input];
    } elseif ($return_errorvalue == 1) {
        if (!isset($val_input[1])) {
            return '"' . substr($input,1,strlen($input)-1) . '"';
        } else {
            return '"' . $val_input[1] . '"';
        }
    } else {
        return '0';
    }
}

?>